package com.monkeyboy.utils;

import org.w3c.dom.Node;
import org.w3c.dom.NodeList;

import javax.crypto.Mac;
import javax.crypto.spec.SecretKeySpec;
import javax.xml.parsers.DocumentBuilder;
import javax.xml.transform.OutputKeys;
import javax.xml.transform.Transformer;
import javax.xml.transform.TransformerFactory;
import javax.xml.transform.dom.DOMSource;
import javax.xml.transform.stream.StreamResult;
import java.io.ByteArrayInputStream;
import java.io.InputStream;
import java.io.StringWriter;
import java.security.MessageDigest;
import java.text.SimpleDateFormat;
import java.util.*;

/**
 * 作用： 微信支付常用工具类
 *
 * @author Gavin
 * @time:2018年6月23日
 */
public class WXPayUtil {
    /**
     * XML格式字符串转换为Map
     *
     * @param strXML XML字符串
     * @return XML数据转换后的Map
     * @throws Exception
     */
    public static Map<String, String> xmlToMap(String strXML) throws Exception {
        Map<String, String> data = new HashMap<String, String>();
        DocumentBuilder documentBuilder = WXPayXmlUtil.newDocumentBuilder();
        InputStream stream = new ByteArrayInputStream(strXML.getBytes("UTF-8"));
        org.w3c.dom.Document doc = documentBuilder.parse(stream);
        doc.getDocumentElement().normalize();
        NodeList nodeList = doc.getDocumentElement().getChildNodes();
        for (int idx = 0; idx < nodeList.getLength(); ++idx) {
            Node node = nodeList.item(idx);
            if (node.getNodeType() == Node.ELEMENT_NODE) {
                org.w3c.dom.Element element = (org.w3c.dom.Element) node;
                data.put(element.getNodeName(), element.getTextContent());
            }
        }
        stream.close();
        return data;

    }

    /**
     * 将Map转换为XML格式的字符串
     *
     * @param data Map类型数据
     * @return XML格式的字符串
     * @throws Exception
     */
    public static String mapToXml(Map<String, String> data) throws Exception {
        org.w3c.dom.Document document = WXPayXmlUtil.newDocument();
        org.w3c.dom.Element root = document.createElement("xml");
        document.appendChild(root);
        for (String key : data.keySet()) {
            String value = data.get(key);
            if (value == null) {
                value = "";
            }
            value = value.trim();
            org.w3c.dom.Element filed = document.createElement(key);
            filed.appendChild(document.createTextNode(value));
            root.appendChild(filed);
        }
        TransformerFactory tf = TransformerFactory.newInstance();
        Transformer transformer = tf.newTransformer();
        DOMSource source = new DOMSource(document);
        transformer.setOutputProperty(OutputKeys.ENCODING, "UTF-8");
        transformer.setOutputProperty(OutputKeys.INDENT, "yes");
        StringWriter writer = new StringWriter();
        StreamResult result = new StreamResult(writer);
        transformer.transform(source, result);
        String output = writer.getBuffer().toString();
        writer.close();

        return output;
    }

    /**
     * 生成带有 sign 的 XML 格式字符串
     *
     * @param data Map类型数据
     * @param key  API密钥
     * @return 含有sign字段的XML
     */
    public static String generateSignedXml(final Map<String, String> data, String key) throws Exception {
        return generateSignedXml(data, key, SignType.MD5);
    }

    /**
     * 生成带有 sign 的 XML 格式字符串
     *
     * @param data     Map类型数据
     * @param key      API密钥
     * @param signType 签名类型
     * @return 含有sign字段的XML
     */
    public static String generateSignedXml(final Map<String, String> data, String key, SignType signType)
            throws Exception {
        String sign = generateSignature(data, key, signType);
        data.put(WXPayConstant.FIELD_SIGN, sign);
        return mapToXml(data);
    }

    /**
     * 判断签名是否正确
     *
     * @param xmlStr XML格式数据
     * @param key    API密钥
     * @return 签名是否正确
     * @throws Exception
     */
    public static boolean isSignatureValid(String xmlStr, String key) throws Exception {
        Map<String, String> data = xmlToMap(xmlStr);
        if (!data.containsKey(WXPayConstant.FIELD_SIGN)) {
            return false;
        }
        String sign = data.get(WXPayConstant.FIELD_SIGN);
        return generateSignature(data, key).equals(sign);
    }

    /**
     * 作用： 判断签名是否正确
     *
     * @param data
     * @param key
     * @return
     * @throws Exception
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static boolean isSignatureValid(Map<String, String> data, String key) throws Exception {
        return isSignatureValid(data, key, SignType.MD5);
    }

    /**
     * 作用： 判断签名是否正确
     *
     * @param data
     * @param key
     * @param signType
     * @return
     * @throws Exception
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static boolean isSignatureValid(Map<String, String> data, String key, SignType signType) throws Exception {
        if (!data.containsKey(WXPayConstant.FIELD_SIGN)) {
            return false;
        }
        String sign = data.get(WXPayConstant.FIELD_SIGN);
        return generateSignature(data, key, signType).equals(sign);
    }

    /**
     * 作用： 生成MD5签名
     *
     * @param data
     * @param key
     * @return
     * @throws Exception
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String generateSignature(final Map<String, String> data, String key) throws Exception {
        return generateSignature(data, key, SignType.MD5);
    }

    /**
     * 作用： 生成签名
     *
     * @param data
     * @param key
     * @param signType
     * @return
     * @throws Exception
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String generateSignature(final Map<String, String> data, String key, SignType signType)
            throws Exception {
        Set<String> keySet = data.keySet();
        String[] keyArray = keySet.toArray(new String[keySet.size()]);
        Arrays.sort(keyArray);
        StringBuilder sb = new StringBuilder();
        for (String k : keyArray) {
            if (k.equals(WXPayConstant.FIELD_SIGN)) {
                continue;
            }
            if (data.get(k).trim().length() > 0) // 参数值为空，则不参与签名
                sb.append(k).append("=").append(data.get(k).trim()).append("&");
        }
        sb.append("key=").append(key);
        if (SignType.MD5.equals(signType)) {
            return MD5(sb.toString()).toUpperCase();
        } else if (SignType.HMACSHA256.equals(signType)) {
            return HMACSHA256(sb.toString(), key);
        } else {
            throw new Exception(String.format("错误的签名类型: %s", signType));
        }
    }

    /**
     * 作用： MD5加密数据
     *
     * @param data
     * @return
     * @throws Exception
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String MD5(String data) throws Exception {
        MessageDigest md = MessageDigest.getInstance("MD5");
        byte[] array = md.digest(data.getBytes("UTF-8"));
        StringBuilder sb = new StringBuilder();
        for (byte item : array) {
            sb.append(Integer.toHexString((item & 0xFF) | 0x100).substring(1, 3));
        }
        return sb.toString().toUpperCase();
    }

    /**
     * 作用： HMACSHA256 加密算法
     *
     * @param data
     * @param key
     * @return
     * @throws Exception
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String HMACSHA256(String data, String key) throws Exception {
        Mac sha256_HMAC = Mac.getInstance("HmacSHA256");
        SecretKeySpec secret_key = new SecretKeySpec(key.getBytes("UTF-8"), "HmacSHA256");
        sha256_HMAC.init(secret_key);
        byte[] array = sha256_HMAC.doFinal(data.getBytes("UTF-8"));
        StringBuilder sb = new StringBuilder();
        for (byte item : array) {
            sb.append(Integer.toHexString((item & 0xFF) | 0x100).substring(1, 3));
        }
        return sb.toString().toUpperCase();
    }

    /**
     * 作用： 生成任意长度的随机字符串
     *
     * @param length
     * @return
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String getRandomString(int length) {
        Random random = new Random();
        StringBuffer sb = new StringBuffer();
        for (int i = 0; i < length; ++i) {
            int number = random.nextInt(3);
            long result = 0;
            switch (number) {
                case 0:
                    result = Math.round(Math.random() * 25 + 65);
                    sb.append(String.valueOf((char) result));
                    break;
                case 1:
                    result = Math.round(Math.random() * 25 + 97);
                    sb.append(String.valueOf((char) result));
                    break;
                case 2:
                    sb.append(String.valueOf(new Random().nextInt(10)));
                    break;
            }
        }

        return sb.toString();
    }

    /**
     * 作用： 可以来标识一个订单，也用做 nonce_str 随机字符串生成：UUID
     *
     * @return
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String generateUUID() {
        return UUID.randomUUID().toString().replaceAll("-", "").substring(0, 32);
    }

    /**
     * 作用： 时间戳精确到秒
     *
     * @return
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String getCurrTimeToSecond() {
        Date now = new Date();
        SimpleDateFormat outFormat = new SimpleDateFormat("yyyyMMddHHmmss");
        String s = outFormat.format(now);
        return s;
    }

    /**
     * 作用： 得到时间戳 格式化的时间戳，精确到毫秒
     *
     * @return
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static String getCurrTimeToMillisecond() {
        Date now = new Date();
        SimpleDateFormat outFormat = new SimpleDateFormat("yyyyMMddHHmmssSSS");
        String s = outFormat.format(now);
        return s;
    }

    /**
     * 作用： 获取当前时间戳 单位:秒
     *
     * @return
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static long getCurrentTimestamp() {
        return System.currentTimeMillis() / 1000;
    }

    /**
     * 作用： 获取当前时间戳 单位:毫秒
     *
     * @return
     * @Author:Gavin
     * @time:2018年6月23日
     */
    public static long getCurrentTimestampMs() {
        return System.currentTimeMillis();
    }

    static class WXPayConstant {
        public static final String FAIL = "FAIL";
        public static final String SUCCESS = "SUCCESS";
        public static final String HMACSHA256 = "HMAC-SHA256";
        public static final String MD5 = "MD5";

        public static final String FIELD_SIGN = "sign";
        public static final String FIELD_SIGN_TYPE = "sign_type";

        // 项目地址
        public static final String BASE_URL = "http://www.monkeyboy.com";
        // 微信网页授权接口地址
        public static final String AUTH_URL = "https://open.weixin.qq.com/connect/oauth2/authorize?appid=APPID&redirect_uri=REDIRECT_URI&response_type=code&scope=SCOPE&state=STATE#wechat_redirect";
        // 公众平台appid
        public static final String APPID = "wxc4a82906f60259a4";
        // 公众平台AppSecret
        public static final String APPSECRET = "c7bee1fa6fd233c2dfbf706e1f9f60e9";
        // 商户号
        public static final String PARTNER = "18883337187";
        // API密钥，签名需要用到
        public static final String PARTNERKEY = "GavinGavinGavinGavinGavinGavin32";
        // 交易类型
        public static final String TRADE_TYPE = "JSAPI";
        // 签名算法
        public static final String SIGNTYPE = "MD5";
        // 微信授权后通过code获取用户的openid，access_token等值
        public static final String ACCESSTOKEN_URL = "https://api.weixin.qq.com/sns/oauth2/access_token?appid=APPID&secret=SECRET&code=CODE&grant_type=authorization_code";
        // 微信统一下单接口
        public static final String ORDER_URL = "https://api.mch.weixin.qq.com/pay/unifiedorder";

        // 微信下单成功后的回调地址
        public static final String NOTIFY_URL = "http://www.monkeyboy.com/wx/notify_url";
    }

    enum SignType {
        MD5, HMACSHA256
    }
}
